home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / P / PopAlert.cpt / PopAlert / card_2837.txt < prev    next >
Text File  |  1988-01-31  |  4KB  |  138 lines
  1. -- card: 2837 from stack: in
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 2733
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 0000
  11. -- rect: left=50 top=151 right=169 bottom=487
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 8192
  18. -- line height: 16
  19. -- part name: 
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 01
  24. -- high flags: 0000
  25. -- rect: left=49 top=197 right=297 bottom=487
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 0
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 8192
  32. -- line height: 16
  33. -- part name: 
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 01
  38. -- high flags: 0000
  39. -- rect: left=49 top=56 right=123 bottom=487
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 0
  43. -- font id: 0
  44. -- text size: 12
  45. -- style flags: 8192
  46. -- line height: 16
  47. -- part name: 
  48.  
  49.  
  50. -- part 4 (button)
  51. -- low flags: 00
  52. -- high flags: 8003
  53. -- rect: left=165 top=127 right=148 bottom=336
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: Alert Box with Answer
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   answer "CAUTION: Do you want to delete this record ?" with "CANCEL" or "OK"
  65. end mouseUp
  66.  
  67.  
  68.  
  69. -- part 5 (button)
  70. -- low flags: 00
  71. -- high flags: 8003
  72. -- rect: left=82 top=172 right=194 bottom=182
  73. -- title width / last selected line: 0
  74. -- icon id / first selected line: 0 / 0
  75. -- text alignment: 1
  76. -- font id: 0
  77. -- text size: 12
  78. -- style flags: 0
  79. -- line height: 16
  80. -- part name: Alert Box #1
  81. ----- HyperTalk script -----
  82. on mouseUp
  83.   get PopAlert(1,0,"CAUTION","This operation will take a lot of time")
  84. end mouseUp
  85.  
  86.  
  87.  
  88. -- part 6 (button)
  89. -- low flags: 00
  90. -- high flags: 8003
  91. -- rect: left=207 top=173 right=195 bottom=307
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 0 / 0
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: Alert Box #2
  100. ----- HyperTalk script -----
  101. on mouseUp
  102.   get PopAlert(2,0,"PATIENCE!", "This operation is going to take a lot of time")
  103. end mouseUp
  104.  
  105.  
  106.  
  107. -- part 7 (button)
  108. -- low flags: 00
  109. -- high flags: 8003
  110. -- rect: left=340 top=173 right=195 bottom=440
  111. -- title width / last selected line: 0
  112. -- icon id / first selected line: 0 / 0
  113. -- text alignment: 1
  114. -- font id: 0
  115. -- text size: 12
  116. -- style flags: 0
  117. -- line height: 16
  118. -- part name: Alert Box #3
  119. ----- HyperTalk script -----
  120. on mouseUp
  121.   get PopAlert(3,0,"CAUTION","Do you really want to delete this card ?")
  122. end mouseUp
  123.  
  124.  
  125.  
  126. -- part contents for card part 1
  127. ----- text -----
  128. is missing something important, an ICON. A true alert box should be like this:
  129.  
  130. -- part contents for card part 2
  131. ----- text -----
  132. This is possible with the PopAlert XFCN. This is the command structure:
  133. PopAlert (AlertId,IconId,Title,Message) 
  134. AlertId - Indicates which alert box to be drawn. The three choices provided are : alert box with a "CONTINUE" button, alert box with a "OK" button, and alert box with a "OK" button and a "CANCEL" button. Use either 1, 2 , or 3 respectively to indicate desired alert box.
  135.  
  136. -- part contents for card part 3
  137. ----- text -----
  138. The "Alert Mechanism" provides applications with a means of reporting errors or giving warnings. An alert box appears when something has gone wrong or must be brought to user's attention. Although an alert box may be simulated using the Hypertalk Answer Command, this implementation